home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / Bonus / Plasmatech / ptscp_eval.exe / %MAINDIR% / EvalC4 / UPTFrame.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  2001-08-31  |  9.4 KB  |  272 lines

  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1999 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'UPTFrame.pas' rev: 4.00
  6.  
  7. #ifndef UPTFrameHPP
  8. #define UPTFrameHPP
  9.  
  10. #pragma delphiheader begin
  11. #pragma option push -w-
  12. #include <Menus.hpp>    // Pascal unit
  13. #include <Dialogs.hpp>    // Pascal unit
  14. #include <Forms.hpp>    // Pascal unit
  15. #include <Controls.hpp>    // Pascal unit
  16. #include <Graphics.hpp>    // Pascal unit
  17. #include <Classes.hpp>    // Pascal unit
  18. #include <SysUtils.hpp>    // Pascal unit
  19. #include <Messages.hpp>    // Pascal unit
  20. #include <Windows.hpp>    // Pascal unit
  21. #include <SysInit.hpp>    // Pascal unit
  22. #include <System.hpp>    // Pascal unit
  23.  
  24. //-- user supplied -----------------------------------------------------------
  25.  
  26. namespace Uptframe
  27. {
  28. //-- type declarations -------------------------------------------------------
  29. #pragma option push -b-
  30. enum TPTFrameStyle { ptfsNone, ptfsGroup, ptfsLowered, ptfsRaised, ptfsDint, ptfsBump, ptfsSingle, ptfsHorzLine, 
  31.     ptfsHorzEdge, ptfsVertLine, ptfsVertEdge };
  32. #pragma option pop
  33.  
  34. typedef void __fastcall (__closure *TPTFramePaintEvent)(System::TObject* aSender, Graphics::TCanvas* 
  35.     aCanvas);
  36.  
  37. class DELPHICLASS TPTCustomGroup;
  38. #pragma pack(push, 4)
  39. class PASCALIMPLEMENTATION TPTCustomGroup : public Controls::TCustomControl 
  40. {
  41.     typedef Controls::TCustomControl inherited;
  42.     
  43. private:
  44.     HIDESBASE MESSAGE void __fastcall CMEnabledChanged(Messages::TMessage &msg);
  45.     MESSAGE void __fastcall CMTextChanged(Messages::TMessage &aMsg);
  46.     HIDESBASE MESSAGE void __fastcall CMColorChanged(Messages::TMessage &aMsg);
  47.     HIDESBASE MESSAGE void __fastcall CMFontChanged(Messages::TMessage &aMsg);
  48.     void __fastcall SetAlignment(Classes::TAlignment aValue);
  49.     void __fastcall SetFrameSpace(int aValue);
  50.     void __fastcall SetFrameStyle(TPTFrameStyle aValue);
  51.     HIDESBASE MESSAGE void __fastcall WMEraseBkgnd(Messages::TWMEraseBkgnd &aMsg);
  52.     HIDESBASE MESSAGE void __fastcall WMNcCalcSize(Messages::TWMNCCalcSize &aMsg);
  53.     HIDESBASE MESSAGE void __fastcall WMNcPaint(Messages::TWMNoParams &aMsg);
  54.     
  55. protected:
  56.     Classes::TAlignment mAlignment;
  57.     bool mDefaultDrawing;
  58.     int mFrameSpace;
  59.     bool mFrameChanged;
  60.     TPTFrameStyle mFrameStyle;
  61.     TPTFramePaintEvent mOnPaint;
  62.     virtual void __fastcall CreateParams(Controls::TCreateParams &Params);
  63.     void __fastcall RepaintNonClient(void);
  64.     virtual void __fastcall PaintNonClient(Graphics::TCanvas* c, const Windows::TRect &aBoundsRect);
  65.     virtual void __fastcall Paint(void);
  66.     __property Classes::TAlignment Alignment = {read=mAlignment, write=SetAlignment, default=2};
  67.     __property bool DefaultDrawing = {read=mDefaultDrawing, write=mDefaultDrawing, default=1};
  68.     __property int FrameSpace = {read=mFrameSpace, write=SetFrameSpace, default=2};
  69.     __property TPTFrameStyle FrameStyle = {read=mFrameStyle, write=SetFrameStyle, default=1};
  70.     __property TPTFramePaintEvent OnPaint = {read=mOnPaint, write=mOnPaint};
  71.     __property Width ;
  72.     __property Height ;
  73.     
  74. public:
  75.     __fastcall virtual TPTCustomGroup(Classes::TComponent* aOwner);
  76.     void __fastcall EnableAllChildren(bool afEnable);
  77. public:
  78.     #pragma option push -w-inl
  79.     /* TCustomControl.Destroy */ inline __fastcall virtual ~TPTCustomGroup(void) { }
  80.     #pragma option pop
  81.     
  82. public:
  83.     #pragma option push -w-inl
  84.     /* TWinControl.CreateParented */ inline __fastcall TPTCustomGroup(HWND ParentWindow) : Controls::TCustomControl(
  85.         ParentWindow) { }
  86.     #pragma option pop
  87.     
  88. };
  89.  
  90. #pragma pack(pop)
  91.  
  92. class DELPHICLASS TPTGroup;
  93. #pragma pack(push, 4)
  94. class PASCALIMPLEMENTATION TPTGroup : public TPTCustomGroup 
  95. {
  96.     typedef TPTCustomGroup inherited;
  97.     
  98. __published:
  99.     __property Alignment ;
  100.     __property DefaultDrawing ;
  101.     __property FrameSpace ;
  102.     __property FrameStyle ;
  103.     __property Align ;
  104.     __property Caption ;
  105.     __property Color ;
  106.     __property Font ;
  107.     __property Enabled ;
  108.     __property ParentColor ;
  109.     __property ParentFont ;
  110.     __property ParentShowHint ;
  111.     __property PopupMenu ;
  112.     __property ShowHint ;
  113.     __property Visible ;
  114.     __property Width ;
  115.     __property Height ;
  116.     __property TabOrder ;
  117.     __property OnClick ;
  118.     __property OnDblClick ;
  119.     __property OnMouseDown ;
  120.     __property OnMouseMove ;
  121.     __property OnMouseUp ;
  122.     __property OnEnter ;
  123.     __property OnExit ;
  124.     __property OnPaint ;
  125.     __property Anchors ;
  126.     __property BiDiMode ;
  127.     __property BorderWidth ;
  128.     __property Constraints ;
  129.     __property ParentBiDiMode ;
  130.     __property UseDockManager ;
  131.     __property OnCanResize ;
  132.     __property OnConstrainedResize ;
  133. public:
  134.     #pragma option push -w-inl
  135.     /* TPTCustomGroup.Create */ inline __fastcall virtual TPTGroup(Classes::TComponent* aOwner) : TPTCustomGroup(
  136.         aOwner) { }
  137.     #pragma option pop
  138.     
  139. public:
  140.     #pragma option push -w-inl
  141.     /* TCustomControl.Destroy */ inline __fastcall virtual ~TPTGroup(void) { }
  142.     #pragma option pop
  143.     
  144. public:
  145.     #pragma option push -w-inl
  146.     /* TWinControl.CreateParented */ inline __fastcall TPTGroup(HWND ParentWindow) : TPTCustomGroup(ParentWindow
  147.         ) { }
  148.     #pragma option pop
  149.     
  150. };
  151.  
  152. #pragma pack(pop)
  153.  
  154. class DELPHICLASS TPTCustomFrame;
  155. #pragma pack(push, 4)
  156. class PASCALIMPLEMENTATION TPTCustomFrame : public Controls::TGraphicControl 
  157. {
  158.     typedef Controls::TGraphicControl inherited;
  159.     
  160. protected:
  161.     Classes::TAlignment mAlignment;
  162.     bool mDefaultDrawing;
  163.     int mFrameSpace;
  164.     TPTFrameStyle mFrameStyle;
  165.     TPTFramePaintEvent mOnPaint;
  166.     void __fastcall SetAlignment(Classes::TAlignment aValue);
  167.     void __fastcall SetFrameSpace(int aValue);
  168.     void __fastcall SetFrameStyle(TPTFrameStyle aValue);
  169.     MESSAGE void __fastcall CMTextChanged(Messages::TMessage &aMsg);
  170.     HIDESBASE MESSAGE void __fastcall CMColorChanged(Messages::TMessage &aMsg);
  171.     HIDESBASE MESSAGE void __fastcall CMFontChanged(Messages::TMessage &aMsg);
  172.     void __fastcall InvalidateInterior(void);
  173.     virtual void __fastcall Paint(void);
  174.     __property Classes::TAlignment Alignment = {read=mAlignment, write=SetAlignment, default=2};
  175.     __property bool DefaultDrawing = {read=mDefaultDrawing, write=mDefaultDrawing, default=1};
  176.     __property int FrameSpace = {read=mFrameSpace, write=SetFrameSpace, default=2};
  177.     __property TPTFrameStyle FrameStyle = {read=mFrameStyle, write=SetFrameStyle, default=2};
  178.     __property Width ;
  179.     __property Height ;
  180.     __property TPTFramePaintEvent OnPaint = {read=mOnPaint, write=mOnPaint};
  181.     
  182. public:
  183.     __fastcall virtual TPTCustomFrame(Classes::TComponent* aOwner);
  184. public:
  185.     #pragma option push -w-inl
  186.     /* TGraphicControl.Destroy */ inline __fastcall virtual ~TPTCustomFrame(void) { }
  187.     #pragma option pop
  188.     
  189. };
  190.  
  191. #pragma pack(pop)
  192.  
  193. class DELPHICLASS TPTFrame;
  194. #pragma pack(push, 4)
  195. class PASCALIMPLEMENTATION TPTFrame : public TPTCustomFrame 
  196. {
  197.     typedef TPTCustomFrame inherited;
  198.     
  199. __published:
  200.     __property Alignment ;
  201.     __property DefaultDrawing ;
  202.     __property FrameSpace ;
  203.     __property FrameStyle ;
  204.     __property OnPaint ;
  205.     __property Align ;
  206.     __property Caption ;
  207.     __property Color ;
  208.     __property Font ;
  209.     __property ParentColor ;
  210.     __property ParentFont ;
  211.     __property ParentShowHint ;
  212.     __property PopupMenu ;
  213.     __property ShowHint ;
  214.     __property Visible ;
  215.     __property Width ;
  216.     __property Height ;
  217.     __property OnClick ;
  218.     __property OnDblClick ;
  219.     __property OnMouseDown ;
  220.     __property OnMouseMove ;
  221.     __property OnMouseUp ;
  222.     __property Anchors ;
  223.     __property BiDiMode ;
  224.     __property Constraints ;
  225.     __property ParentBiDiMode ;
  226.     __property OnCanResize ;
  227.     __property OnConstrainedResize ;
  228. public:
  229.     #pragma option push -w-inl
  230.     /* TPTCustomFrame.Create */ inline __fastcall virtual TPTFrame(Classes::TComponent* aOwner) : TPTCustomFrame(
  231.         aOwner) { }
  232.     #pragma option pop
  233.     
  234. public:
  235.     #pragma option push -w-inl
  236.     /* TGraphicControl.Destroy */ inline __fastcall virtual ~TPTFrame(void) { }
  237.     #pragma option pop
  238.     
  239. };
  240.  
  241. #pragma pack(pop)
  242.  
  243. //-- var, const, procedure ---------------------------------------------------
  244. extern PACKAGE void __fastcall DrawLoweredFrame(Graphics::TCanvas* c, const Windows::TRect &r);
  245. extern PACKAGE void __fastcall DrawRaisedFrame(Graphics::TCanvas* c, const Windows::TRect &r);
  246. extern PACKAGE void __fastcall DrawDintFrame(Graphics::TCanvas* c, const Windows::TRect &r);
  247. extern PACKAGE void __fastcall DrawBumpFrame(Graphics::TCanvas* c, const Windows::TRect &r);
  248. extern PACKAGE void __fastcall DrawSingleFrame(Graphics::TCanvas* c, const Windows::TRect &r);
  249. extern PACKAGE void __fastcall DrawGroupFrame(Graphics::TCanvas* c, const Windows::TRect &ar, const 
  250.     AnsiString caption, Graphics::TColor color, bool enabled);
  251. extern PACKAGE void __fastcall DrawVertLine(Graphics::TCanvas* c, const Windows::TRect &r, Graphics::TColor 
  252.     c1, Graphics::TColor c2);
  253. extern PACKAGE void __fastcall DrawVertEdge(Graphics::TCanvas* c, const Windows::TRect &r, Graphics::TColor 
  254.     c1, Graphics::TColor c2);
  255. extern PACKAGE void __fastcall DrawHorzLine(Graphics::TCanvas* c, const Windows::TRect &r, Graphics::TColor 
  256.     c1, Graphics::TColor c2);
  257. extern PACKAGE void __fastcall DrawHorzEdge(Graphics::TCanvas* c, const Windows::TRect &r, Graphics::TColor 
  258.     c1, Graphics::TColor c2);
  259. extern PACKAGE void __fastcall DrawFrame(TPTFrameStyle fs, Graphics::TCanvas* c, const Windows::TRect 
  260.     &r);
  261. extern PACKAGE void __fastcall AdjustRectForFrame(TPTFrameStyle fs, Windows::TRect &r);
  262.  
  263. }    /* namespace Uptframe */
  264. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  265. using namespace Uptframe;
  266. #endif
  267. #pragma option pop    // -w-
  268.  
  269. #pragma delphiheader end.
  270. //-- end unit ----------------------------------------------------------------
  271. #endif    // UPTFrame
  272.